import java.awt.*;
import java.awt.event.*;
import javax.swing.*;


public class ChessBord extends JPanel implements MouseListener{//继承面板类和鼠标事件接口
    public static int MARGIN=30;//定义边距
    public static int ROWS=15;//定义行数
    public static int COLS=15;//定义列数
    public static int GRID_SPAN=35;//网格间距
    Chess[] chessList=new Chess[(ROWS+1)*(COLS+1)];//定义一个棋子表，存放每一步下的棋子情况（x、y、color）
    String[][] board=new String[MARGIN*2+GRID_SPAN*COLS][MARGIN*2+GRID_SPAN*COLS];
    //存放棋盘，每一个像素点是一个元素，存储当前位置是否有棋子，有黑子值为“黑棋“，有白子值为”白棋“，无棋子值为”0“
    int chessCount;//棋子数目
    int xindex,yindex;//棋子的左上角点位置
    boolean start=true;//开始默认黑子先下
    boolean GameOver=false;//定义是否游戏结束
    public ChessBord() {//棋盘类构造函数
        setBackground(Color.LIGHT_GRAY);//设置背景颜色
        addMouseListener(this);//将棋盘类添加到鼠标事件监听器
        addMouseMotionListener(new MouseMotionListener() {//匿名内部类
            @Override
            public void mouseMoved(MouseEvent e) {//根据鼠标的移动所在的坐标来设置鼠标光标形状
                int x1=(e.getX()-MARGIN+GRID_SPAN/2)/GRID_SPAN;//对鼠标光标的x坐标进行转换
                int y1=(e.getY()-MARGIN+GRID_SPAN/2)/GRID_SPAN;//对鼠标光标的y坐标进行转换
                if(x1<0||x1>ROWS||y1<0||y1>COLS||GameOver||findchess(x1, y1)) {
                    setCursor(new Cursor(Cursor.DEFAULT_CURSOR));//设置鼠标光标为默认形状
                }else {
                    setCursor(new Cursor(Cursor.HAND_CURSOR));//设置鼠标光标为手型
                }
            }
            @Override
            public void mouseDragged(MouseEvent e) {
            }
        });
        for(int i=0;i<MARGIN*2+GRID_SPAN*COLS;i++) {//对board[][]赋初值
            for (int j = 0; j < MARGIN*2+GRID_SPAN*COLS; j++) {
                board[i][j]="0";
            }
        }
    }
    @Override
    public void mouseClicked(MouseEvent e) {
        // TODO Auto-generated method stub
    }
    @Override
    public void mousePressed(MouseEvent e) {//鼠标点击事件
        if(GameOver)//游戏结束，不能再下子
            return ;


        xindex=(e.getX()-MARGIN+GRID_SPAN/2)/GRID_SPAN;//得到棋子x坐标
        yindex=(e.getY()-MARGIN+GRID_SPAN/2)/GRID_SPAN;//得到棋子y坐标


        String colorName=start?"黑棋":"白棋";//判断是什么颜色的棋子


        if(xindex<0||xindex>ROWS||yindex<0||yindex>COLS) {//棋子在棋盘外不能下，
            return ;
        }else if(findchess( xindex, yindex)) {//所下位置已有棋子，不能下
            return ;
        }

        board[xindex][yindex]=colorName;//以棋子x坐标y坐标做索引将棋子的颜色添加到board中

        Chess po=new Chess(xindex,yindex,start?Color.black:Color.WHITE);//对棋子对象进行初始化
        chessList[chessCount++]=po;//将棋子对象添加到棋子数组中

        repaint();//重画图型

        if( win(xindex,yindex,start)) {//判断是否胜利
            String msg=String.format("恭喜 %s赢了",colorName);
            JOptionPane.showMessageDialog(this, msg);
            //gameOver=true;
            GameOver=true;
        }else if(chessCount==(COLS+1)*(ROWS+1)) {//判断是否全部下满
            String msg=String.format("恭喜 %s赢了",colorName);
            JOptionPane.showMessageDialog(this, msg);
            GameOver=true;
        }
        start=!start;//改变棋子下一步落子颜色
        colorName=start?"黑棋":"白棋";//判断是什么颜色的棋子
        System.out.println(colorName);
    }
    @Override
    public void mouseReleased(MouseEvent e) {
    }
    @Override
    public void mouseEntered(MouseEvent e) {
    }
    @Override
    public void mouseExited(MouseEvent e) {
    }
    @Override
    protected void paintComponent(Graphics g) {//画棋盘和棋子
        super.paintComponent(g);
        for(int i=0;i<=ROWS;i++) {//画横线
            g.drawLine(MARGIN, MARGIN+i*GRID_SPAN, MARGIN+COLS*GRID_SPAN, MARGIN+i*GRID_SPAN);
        }
        for(int j=0;j<=COLS;j++) {//画竖线
            g.drawLine(MARGIN+j*GRID_SPAN, MARGIN, MARGIN+j*GRID_SPAN, MARGIN+ROWS*GRID_SPAN);
        }
        for(int i=0;i<chessCount;i++) {//画棋子
            int xpos=chessList[i].getX()*GRID_SPAN+MARGIN;//得到棋子x坐标
            int ypos=chessList[i].getY()*GRID_SPAN+MARGIN;//得到棋子y坐标
            g.setColor(chessList[i].getColor());//设置棋子颜色
            g.fillOval(xpos-Chess.DIAMETER/2, ypos-Chess.DIAMETER/2, Chess.DIAMETER, Chess.DIAMETER);//画棋子
            if(i==chessCount-1){
                g.setColor(Color.red);//标记最后一个棋子为红色
                g.drawRect(xpos-Chess.DIAMETER/2, ypos-Chess.DIAMETER/2, Chess.DIAMETER, Chess.DIAMETER);
            }
        }
    }
    private    boolean findchess(int xindex,int yindex) {//查找所在位置是否有棋子
        for (Chess c : chessList) {
            if(c!=null&&c.getX()==xindex&&c.getY()==yindex)
                return true;
        }
        return false;
    }
    private    boolean win(int x,int y,boolean start) {//对棋子输赢的判断
        String str=start?"黑棋":"白棋";
        int count, i,j;

        //棋子所在行否有五子相连的情况
        i=x-1; count=1;
        while (i>=0&&i>=x-4&&board[i][y].equals(str)){
            i--;count++;
            if(count==5){
                return true;
            }
        }
        i=x+1;
        while (i<=15&&i<=x+4&&board[i][y].equals(str)){
            i++;count++;
            if(count==5){
                return true;
            }
        }

        //棋子所在列否有五子相连的情况
        j=y-1;count=1;
        while (j>=0&&j>=y-4&&board[x][j].equals(str)){
            j--;count++;
            if(count==5){
                return true;
            }
        }
        j=y+1;
        while (j<=15&&j<=y+4&&board[x][j].equals(str)){
            j++;count++;
            if(count==5){
                return true;
            }
        }

        //棋子所在撇否有五子相连的情况（副对角线上是否有连五）
        i=x-1;j=y+1;count=1;
        while (i>=0&&i>=x-4&&j<=15&&j<=y+4&&board[i][j].equals(str)){
            i--;j++;count++;
            if(count==5){
                return true;
            }
        }
        i=x+1;j=y-1;
        while (i<=15&&i<=x+4&&j>=0&&j>=y-4&&board[i][j].equals(str)){
            i++;j--;count++;
            if(count==5){
                return true;
            }
        }

        //棋子所在捺否有五子相连的情况（主对角线上是否有连五）
        i=x-1;j=y-1;count=1;
        while (i>=0&&i>=x-4&&j>=0&&j>=y-4&&board[i][j].equals(str)){
            i--;j--;count++;
            if(count==5){
                return true;
            }
        }
        i=x+1;j=y+1;
        while (i<=15&&i<=x+4&&j<=15&&j<=y+4&&board[i][j].equals(str)){
            i++;j++;count++;
            if(count==5){
                return true;
            }
        }
        return false;
    }
    public void goBack() {//悔棋函数
        if(chessCount==0) {
            return ;
        }
        board[chessList[chessCount-1].getX()][chessList[chessCount-1].getY()]="0";
        chessList[chessCount-1]=null;
        chessCount--;
        if(chessCount>0) {
            xindex=chessList[chessCount-1].getX();
            yindex=chessList[chessCount-1].getY();
        }
        start=!start;
        GameOver=false;
        repaint();
    }
    public void restartGame() {//重新开始函数
        for(int i=0;i<chessList.length;i++)//设置为初始状态
            chessList[i]=null;
        for(int i=0;i<MARGIN*2+GRID_SPAN*COLS;i++) {
            for (int j = 0; j < MARGIN*2+GRID_SPAN*COLS; j++) {
                board[i][j]="0";
            }
        }
        start=true;
        GameOver=false;
        chessCount=0;
        repaint();
    }
    public Dimension getPreferredSize(){//重写父类方法，给当前类的对象一个最合适的大小
        return new Dimension(MARGIN*2+GRID_SPAN*COLS,MARGIN*2+GRID_SPAN*ROWS);
    }
}
